home *** CD-ROM | disk | FTP | other *** search
/ Night Owl 6 / Night Owl's Shareware - PDSI-006 - Night Owl Corp (1990).iso / 016a / love4th.zip / LOVEMASM.CFG < prev    next >
Text File  |  1991-10-01  |  2KB  |  44 lines

  1. ((
  2. LOVE Forth Assembly Language Configuration File.
  3. This file must be named "ASSEMBLY.CFG" and must exist in the current directory.
  4. Experienced programmers are encouraged to customize this file to suit their
  5. own requirements.
  6. Example: Change output directories or drives to ramdrives.
  7. **** This file is for Microsoft's Macro Assembler V5.1 or above ****
  8. ))
  9.  
  10. ( command" -- defines the command line used to execute your assembler. )
  11. ( -- always prefix this command line with /C and end it with \r  )
  12. command"  /C MASM /MX /T code4th.asm code4th.obj code4th.lst; >nul\r"
  13.  
  14. ( inputfile" -- defines the path and filename of the file to be assembled. )
  15. inputfile" code4th.ASM\0"
  16.  
  17. ( outputfile" -- defines the path and filename of the object file. )
  18. outputfile" code4th.OBJ\0"
  19.  
  20. ( listfile" -- defines the path and filename of the assembly listing [optional]. )
  21. listfile" code4th.LST\0"
  22.  
  23. ( errorfile" -- defines the path and filename of the assembly errors if any. )
  24. errorfile" code4th.LST\0"
  25.  
  26. ( next" -- defines the macro that expands any occurance on'next' in the )
  27. ( assembly code into the LOVE Forth inline inner interpreter. )
  28. next" next\tmacro\r\n\tlodsw\r\n\tmov bx,ax\r\n\tjmp word ptr [bx]\r\n\tendm\r\n"
  29.  
  30. ( codeheader" -- The string that contains the initial required segmentation )
  31. ( directive directives to begin assembly. )
  32. codeheader" \r\ncode\tsegment\r\n"
  33.  
  34. ( codefooter" -- contains the required segmentation directives to end assembly. )
  35. codefooter" \r\ncode ends\r\n\tend"
  36.  
  37.  
  38. cseg$" \r\ncode\tsegment byte public 'CODE'\r\ncode ends"
  39. tseg$" \r\nthreads\tsegment word public 'THREADS'\r\nthreads ends"
  40. dseg$" \r\ndata\tsegment byte public 'DATA'\r\ndata ends"
  41. hseg$" \r\nheads\tsegment byte public 'HEADS'\r\nheads ends"
  42. sseg$" \r\nstacks\tsegment byte public 'STACKS'\r\nstacks ends"
  43. assume$" \r\n\tassume cs:code, ds:code, es:code\r\n\tpublic\r\n"
  44.